home *** CD-ROM | disk | FTP | other *** search
/ Info-Mac 4 / Info_Mac IV CD-ROM (Pacific HiTech Inc.)(August 1994).iso / Applications / Demos_Demo folder / Demos_Info folder / Demos™ Demonstration / More Examples / Projectile Motion < prev    next >
Text File  |  1994-02-21  |  1KB  |  59 lines
  1. { From user Brian Sterling, Project Projectile_motion at Mon, Feb 21, 1994 12:51 PM}
  2.  
  3.  
  4. { System Variables with non-default values: }
  5. Typechecking := 1
  6. Checking := 1
  7. Saveoptions := 2
  8. Savevalues := 0
  9.  
  10.  
  11. { Non-default Time SysVar value: }
  12. Time := Sequence(0,6,Dt)
  13.  
  14. Project Projectile_motion
  15. Title: Projectile Motion
  16. Description: An example using the Dynamic system function to calculate projectile motion.
  17. Author: Brian Sterling
  18. Date: Mon, Feb 21, 1994 12:34 PM
  19. Saveauthor: Brian Sterling
  20. Savedate: Mon, Feb 21, 1994 12:51 PM
  21. Diagstate: 1,40,50,372,260,1
  22. Fileinfo: 0,-1,1779,Project Projectile_motion,Projectile Motion
  23. Getresource Pagesetup,1
  24.  
  25. Chance Dt
  26. Title: time increment
  27. Units: s
  28. Description: time increment
  29. Definition: 0.5
  30. Location: 88,64
  31. Nodesize: 48,20
  32.  
  33. Chance A
  34. Title: acceleration
  35. Units: m/s^2
  36. Description: The acceleration of a projectile is the acceleration due to gravity.
  37. Definition: -9.8
  38. Location: 88,120
  39. Nodesize: 48,20
  40.  
  41. Chance V
  42. Title: velocity
  43. Units: m/s
  44. Description: The velocity is the integral of the acceleration.
  45. Definition: Dynamic(0,(V[Time-1]+((A*Dt)/2)))
  46. Location: 88,176
  47. Nodesize: 48,20
  48.  
  49. Chance D
  50. Title: distance
  51. Units: m
  52. Description: The distance is the integral of the velocity.
  53. Definition: Dynamic( 100, d[Time-1] + v * dt )
  54. Location: 208,144
  55. Nodesize: 48,20
  56.  
  57. Close Projectile_motion
  58.  
  59.